/*-----------------------------------------------------------------------*/
/* Low level disk I/O module SKELETON for FatFs     (C)ChaN, 2019        */
/*-----------------------------------------------------------------------*/
/* If a working storage control module is available, it should be        */
/* attached to the FatFs via a glue function rather than modifying it.   */
/* This is an example of glue functions to attach various exsisting      */
/* storage control modules to the FatFs module with a defined API.       */
/*-----------------------------------------------------------------------*/

#include "ff.h"			/* Obtains integer types */
#include "diskio.h"		/* Declarations of disk functions */
#include "kernel/astralapi.h"
/* Definitions of physical drive number for each drive */
#define DEV_RAM		1	/* Example: Map Ramdisk to physical drive 0 */
#define DEV_MMC		0	/* Example: Map MMC/SD card to physical drive 1 */
#define DEV_USB		2	/* Example: Map USB MSD to physical drive 2 */


int ram_disk_initialize();
int ram_disk_read(unsigned char *buff, unsigned sector, unsigned count);
int ram_disk_write(const unsigned char *buff, unsigned sector, unsigned count);
int ram_disk_status ();
int ram_disk_ioctl(unsigned char cmd, void *buff);

/*-----------------------------------------------------------------------*/
/* Get Drive Status                                                      */
/*-----------------------------------------------------------------------*/

DSTATUS disk_status(
	BYTE pdrv /* Physical drive nmuber to identify the drive */
)
{
	DSTATUS stat;
	int result;

	switch (pdrv)
	{
	case DEV_RAM:
		result = ram_disk_status();
		if (0 == result)
		{
			stat = RES_OK;
		}
		break;

	case DEV_MMC:
	
		result = ram_disk_status();
		if (0 == result)
		{
			stat = RES_OK;
		}
		break;

	case DEV_USB:
		return RES_ERROR;
	}
	return stat;
}

/*-----------------------------------------------------------------------*/
/* Inidialize a Drive                                                    */
/*-----------------------------------------------------------------------*/

DSTATUS disk_initialize (
	BYTE pdrv				/* Physical drive nmuber to identify the drive */
)
{
	DSTATUS stat;
	int result;
	AstralDevice d;

	switch (pdrv)
	{
	case DEV_RAM:
		result = ram_disk_initialize();
		if (0 == result)
		{
			stat = RES_OK;
		}
		break;

	case DEV_MMC:
		
		result = ram_disk_initialize();
		d = open_device("sdc");
		d->operations->dopen(d, NULL);
		stat = RES_OK;
		break;

	case DEV_USB:
		return RES_ERROR;
	}
	return stat;
}

/*-----------------------------------------------------------------------*/
/* Read Sector(s)                                                        */
/*-----------------------------------------------------------------------*/

DRESULT disk_read (
	BYTE pdrv,		/* Physical drive nmuber to identify the drive */
	BYTE *buff,		/* Data buffer to store read data */
	LBA_t sector,	/* Start sector in LBA */
	UINT count		/* Number of sectors to read */
)
{
	DRESULT res;
	int result;
	AstralDevice d;

	switch (pdrv)
	{
	case DEV_RAM:
		// translate the arguments here

		result = ram_disk_read(buff, sector, count);
		if (0 == result)
		{
			res = RES_OK;
		}
		break;

	case DEV_MMC:
		d = open_device("sdc");
		d->operations->dread(d, CAST_AS(char*, buff), sector, CAST_AS(int*, count));
		res = RES_OK;
		break;

	case DEV_USB:
		return RES_ERROR;
	}
	return res;
}

/*-----------------------------------------------------------------------*/
/* Write Sector(s)                                                       */
/*-----------------------------------------------------------------------*/

#if FF_FS_READONLY == 0

DRESULT disk_write(
	BYTE pdrv,		  /* Physical drive nmuber to identify the drive */
	const BYTE *buff, /* Data to be written */
	LBA_t sector,	  /* Start sector in LBA */
	UINT count		  /* Number of sectors to write */
)
{
	DRESULT res;
	int result;
	AstralDevice d;

	switch (pdrv)
	{
	case DEV_RAM:
		// translate the arguments here

		result = ram_disk_write(buff, sector, count);
		if (0 == result)
		{
			res = RES_OK;
		}
		break;

	case DEV_MMC:
		d = open_device("sdc");
		d->operations->dwrite(d, CAST_AS(char*, buff), sector, CAST_AS(int*, count));
		res = RES_OK;
		break;

	case DEV_USB:
		return RES_ERROR;
	}
	return res;
}

#endif

/*-----------------------------------------------------------------------*/
/* Miscellaneous Functions                                               */
/*-----------------------------------------------------------------------*/

DRESULT disk_ioctl(
	BYTE pdrv, /* Physical drive nmuber (0..) */
	BYTE cmd,  /* Control code */
	void *buff /* Buffer to send/receive control data */
)
{
	DRESULT res;
	int result;

	switch (pdrv)
	{
	case DEV_RAM:

		// Process of the command for the RAM drive
		result = ram_disk_ioctl(cmd, buff);
		if (0 == result)
		{
			res = RES_OK;
		}
		break;

	case DEV_MMC:
		result = ram_disk_ioctl(cmd, buff);
		if (0 == result)
		{
			res = RES_OK;
		}
		break;

	case DEV_USB:
		return RES_ERROR;
	}
	return res;
}
